Imports System.Windows.Forms
Imports Vintasoft.Imaging.Codecs.Tiff

Public Partial Class CreateNewFileForm
	Inherits Form

	Private _fileFormat As TiffFileFormat = TiffFileFormat.LittleEndian
	Public ReadOnly Property FileFormat() As TiffFileFormat
		Get
			Return _fileFormat
		End Get
	End Property

	Private _fileVersion As TiffFileVersion = TiffFileVersion.StandardTIFF
	Public ReadOnly Property FileVersion() As TiffFileVersion
		Get
			Return _fileVersion
		End Get
	End Property



	Public Sub New()
		InitializeComponent()
	End Sub



	Private Sub bOk_Click(sender As Object, e As EventArgs)
		If bigEndianRadioButton.Checked Then
			_fileFormat = TiffFileFormat.BigEndian
		End If

		If bigTiffRadioButton.Checked Then
			_fileVersion = TiffFileVersion.BigTIFF
		End If

		DialogResult = System.Windows.Forms.DialogResult.OK
	End Sub

End Class
